﻿<html>
<HTML xmlns:IE><head>
	<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
	<link rel="stylesheet" href="date.css" type="text/css">
	<STYLE>
	@media all 
	{
	  IE\:Calendar 
	  {
	    behavior: url(calendar.htc) ;
	    width : 33%;
	  }
	}
	  A:link { color:#003399; text-decoration:none; }
	  A:visited { color:#6699CC; text-decoration:none; }
	  A:hover { text-decoration:underline; }
	</STYLE>
	<title>选择日期</title>
	<SCRIPT LANGUAGE=javascript FOR=window EVENT=onload>
	<!--
	//window.returnValue = '';
	//-->
	</SCRIPT>
</head>
<body>
</BODY>
</html>
	<div align=CENTER>
		<IE:Calendar id="cal" day=1 month=1 year=2000 style="width : 300; height : 275; border : 1px solid black;"> </IE:Calendar>
	</div>
	<div align=center style="margin-top:5px">
		<input type=button class=button value="确定" onclick="vbscript:dosave">
		<input type=button class=button value="取消" onclick="vbscript:window.close">
	</div>
<script language=vbscript>
	sub doSave
		dim i
		k=document.getElementById("cal").year & "-" 
		k=k & string(2-len(document.getElementById("cal").month),"0") & document.getElementById("cal").month & "-"
		k=k & string(2-len(document.getElementById("cal").day),"0") & document.getElementById("cal").day
		window.returnValue = k
		window.close
	end sub
//-->
</script>
<script language=vbscript>
	dim k
	k=window.dialogArguments
	if not isdate(k) then k=now()
	document.getElementById("cal").day=day(k)
	document.getElementById("cal").month=month(k)
	document.getElementById("cal").year=year(k)
</script>